﻿Public Class Room
    Private m_roomID As Integer
    Private m_roomType As Integer
    Private m_hotelID As Integer
    Private m_numRooms As Integer

    Public Property RoomID As Integer
        Get
            Return m_roomID

        End Get
        Set(value As Integer)
            m_roomID = value
        End Set
    End Property

    Public Property RoomType As Integer
        Get
            Return m_roomType

        End Get
        Set(value As Integer)
            m_roomType = value
        End Set
    End Property

    Public Property HotelID As Integer
        Get
            Return m_hotelID

        End Get
        Set(value As Integer)
            m_hotelID = value
        End Set
    End Property

    Public Property NumRooms As Integer
        Get
            Return m_numRooms

        End Get
        Set(value As Integer)
            m_numRooms = value
        End Set
    End Property
End Class
